Complete Linux/Complete Linux.iso/docs/system/mail/transpor/ifmail23.z/ifmail23/ifmail/misc/lmsgid

Text File | 1993-08-25 | 131 b | 8 lines

#!/usr/bin/perl

dbmopen(ifdbm,"msgidb",0666);
while(($key,$val)=each %ifdbm) {
    print $key, ' = ', $val, "\n";
}
dbmclose(ifdbm);